Cream of the Crop 22/Cream of the Crop 22.iso/games/zmud32.zip/ZMUD.EXE/0/RCDATA/TEDITCOM/TEDITCOM.txt

Text File | 1996-08-04 | 21KB | 584 lines

object EditCom: TEditCom
  Left = 186
  Top = 192
  Width = 527
  Height = 300
  Caption = 'Edit Command Buffer'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  KeyPreview = True
  Menu = MainMenu1
  ShowHint = True
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 519
    Height = 27
    Align = alTop
    BevelOuter = bvLowered
    TabOrder = 0
    object BoldButton: TSpeedButton
      Left = 201
      Top = 1
      Width = 25
      Height = 25
      Hint = 'Bold|'
      AllowAllUp = True
      GroupIndex = 1
      Glyph.Data = {
        90010000424D9001000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333333333333333333338888888888333330000000000
        3333333338883338883333330003330003333333388833338883333300033330
        0033333338883333888333330003333000333333388833338883333300033330
        0033333338883338883333330003330003333333388888888333333300000000
        3333333338883338883333330003330003333333388833338883333300033330
        0033333338883333888333330003333000333333388833388833333300033300
        0333333888888888833333000000000033333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333000000000000
        0000000000000000000000000000000000000000}
      NumGlyphs = 2
      OnClick = BoldButtonClick
    end
    object ColorButton: TSpeedButton
      Left = 225
      Top = 1
      Width = 25
      Height = 25
      Hint = 'Color|'
      Glyph.Data = {
        90010000424D9001000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333000000000000033300000000000003330DDD06660F
        FF033308880888088803330DDD06660FFF033308880888088803330DDD06660F
        FF03330888088808880333000000000000033300000000000003330BBB08880E
        EE033308880888088803330BBB08880EEE033308880888088803330BBB08880E
        EE033308880888088803330000000000000333000000000000033309990AAA0C
        CC0333088808880888033309990AAA0CCC0333088808880888033309990AAA0C
        CC03330888088808880333000000000000033300000000000003333333333333
        3333333333333333333333333333333333333333333333333333000000000000
        0000000000000000000000000000000000000000}
      NumGlyphs = 2
      OnClick = ColorButtonClick
    end
    object SendButton: TSpeedButton
      Left = 121
      Top = 1
      Width = 25
      Height = 25
      Hint = 'Send|'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
        333333333333337FF3333333333333903333333333333377FF33333333333399
        03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
        99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
        99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
        03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
        33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
        33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
        3333777777333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = SendandClose1Click
    end
    object OpenButton: TSpeedButton
      Left = 33
      Top = 1
      Width = 25
      Height = 25
      Hint = 'Open|'
      Glyph.Data = {
        90010000424D9001000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        5555555555555555555555555555555555555500000000000555550000000000
        05555008888888888055500B7B7B7B7B7055507088888888805550F0B7B7B7B7
        B055507088888888880550B07B7B7B7B7B05507708888888880550FB07B7B7B7
        B705507708888888888050BF0B7B7B7B7B70507770000888888050FBF00007B7
        B7B0507777777000000550BFBFBFB0000005507777777777055550FBFBFBFBFB
        0555507777777777055550BFBFBFBFBF0555507777700000555550FBFBF00000
        5555550000055555555555000005555555555555555555555555555555555555
        5555555555555555555555555555555555555555555555555555000000000000
        0000000000000000000000000000000000000000}
      NumGlyphs = 2
      OnClick = Open1Click
    end
    object SaveButton: TSpeedButton
      Left = 57
      Top = 1
      Width = 25
      Height = 25
      Hint = 'Save|'
      Glyph.Data = {
        90010000424D9001000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000888888
        800333FFFFFFFFFFFFF33000008777777000388888888888883F300000870077
        70008F3338F3FF38F38F30000087007770008F3338F88F38F38F300000877777
        70008F3338F88FF8F38F30000000000000008F3338888888338F300000000000
        00008F3FFFFFFFFFFF8F3000FFFFFFFFF0008F88888888888F8F3000FFFFFFFF
        F0008F8F333333338F8F3000FFFFFFFFF0008F8F333333338F8F3000FFFFFFFF
        F0008F8F333333338F8F3000FFFFFFFFF0008F8F333333338F8F3000FFFFFFFF
        F0808F8F333333338F8F3000FFFFFFFFF0008F8F33333333888F330099999999
        9003838FFFFFFFFF8F8333333333333333333888888888888833000000000000
        0000000000000000000000000000000000000000}
      NumGlyphs = 2
      OnClick = Save1Click
    end
    object CaptButton: TSpeedButton
      Left = 89
      Top = 1
      Width = 25
      Height = 25
      Hint = 'Capture|'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      NumGlyphs = 2
      OnClick = Capture1Click
    end
    object Toggle: TSpeedButton
      Left = 257
      Top = 1
      Width = 25
      Height = 25
      Hint = 'Toggle Capture|'
      AllowAllUp = True
      GroupIndex = 2
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
        FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
        FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
        007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
        7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
        99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
        99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
        99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
        93337FFFF7737777733300000033333333337777773333333333}
      NumGlyphs = 2
      OnClick = ToggleClick
    end
    object Parse: TSpeedButton
      Left = 281
      Top = 1
      Width = 25
      Height = 25
      Hint = 'Parse Commands|'
      AllowAllUp = True
      GroupIndex = 3
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        003337777777777777F330FFFFFFFFFFF033373F3F3F3F3F3733330F0F0F0F0F
        03333F7F737373737FFF0000FFFFFFF0000377773FFFFFF7777F0FF800000008
        FF037F3F77777773FF7F0F9FFFFFFFF000037F7333333337777F0FFFFFFFFFFF
        FF0373FFFFFFFFFFFF7330000000000000333777777777777733333000000000
        3333333777777777F3333330FFFFFFF033333337F3FFFFF7F3333330F00000F0
        33333337F77777F7F3333330F0AAE0F033333337F7F337F7F3333330F0DAD0F0
        33333337F7FFF7F7F3333330F00000F033333337F7777737F3333330FFFFFFF0
        33333337FFFFFFF7F333333000000000333333377777777733330000}
      NumGlyphs = 2
      OnClick = ParseClick
    end
    object PrefixBtn: TSpeedButton
      Left = 346
      Top = 5
      Width = 16
      Height = 16
      Hint = 'Prefix Toggle|'
      AllowAllUp = True
      GroupIndex = 5
      OnClick = PrefixBtnClick
    end
    object SendSelectBtn: TSpeedButton
      Left = 145
      Top = 1
      Width = 25
      Height = 25
      Hint = 'Send Selected Text|'
      Glyph.Data = {
        90010000424D9001000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
        333333333333338FF3333333333333903333333333333388FF33333333333399
        03333FFFFFFFFF888FF3000000999999903388888888888888FF0FFFF0999999
        99038F3338888888888F0FFFF099999999908F3FF888888888880C77C0999999
        99038F883888888888830CCCC099999990338F3FF888888888330C77CCCCC099
        03338F883333388883330CCCCCCCC09033338F3FF3FFF88833330C77C0000003
        33338F883888888333330FFFF0FF033333338F3FF8F3833333330F07F0F03333
        33338F8838F8333333330FFFF003333333338FFFF88333333333000000333333
        3333888888333333333333333333333333333333333333333333000000000000
        0000000000000000000000000000000000000000}
      NumGlyphs = 2
      OnClick = SendSelectBtnClick
    end
    object SendLineBtn: TSpeedButton
      Left = 169
      Top = 1
      Width = 25
      Height = 25
      Hint = 'Send Line|'
      Glyph.Data = {
        90010000424D9001000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
        333333333333338FF3333333333333903333333333333388FF33333333333399
        03333FFFFFFFFF888FF3000000999999903388888888888888FF0FFFF0999999
        99038F3338888888888F0FFFF099999999908F3FF888888888880F00F0999999
        99038F883888888888830FFFF099999990338F3FF888888888330CCCCCCCC099
        03338F883333388883330FFFFFFFF09033338F3FF3FFF88833330F00F0000003
        33338F883888888333330FFFF0FF033333338F3FF8F3833333330F07F0F03333
        33338F8838F8333333330FFFF003333333338FFFF88333333333000000333333
        3333888888333333333333333333333333333333333333333333000000000000
        0000000000000000000000000000000000000000}
      NumGlyphs = 2
      OnClick = SendLineBtnClick
    end
    object TopBtn: TSpeedButton
      Left = 1
      Top = 1
      Width = 25
      Height = 25
      Hint = 'Keep on top|'
      AllowAllUp = True
      GroupIndex = 1
      Glyph.Data = {
        90010000424D9001000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
        3333333333333333333333333330333333333333333333333333333333303333
        3333333333333333333333333330333333333333333333333333333333303333
        3333333333333333333333339999999333333333333333333333339999999999
        9333333333333333333333999111119913333333333333333333333919999911
        3333333333333333333333339999991333333333333333333333333399999913
        3333333333333333333333339111111333333333333333333333333319999913
        3333333333333333333333399999999933333333333333333333333399999993
        3333333333333333333333333333333333333333333333333333000000000000
        0000000000000000000000000000000000000000}
      NumGlyphs = 2
      OnClick = TopBtnClick
    end
    object SyntaxBtn: TSpeedButton
      Left = 305
      Top = 1
      Width = 25
      Height = 25
      Hint = 'Use Color Syntax|'
      AllowAllUp = True
      GroupIndex = 4
      Glyph.Data = {
        90010000424D9001000000000000760000002800000020000000100000000100
        0400000000000001000000000000000000000000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333330333330003300033333333333333333303333033330
        3303333333333333333330333300003033033333333333333333300303033030
        3303333333333333333330303330033300033333333333333333333333333333
        3303333333333333333333333333333333033333333333333333300000003333
        3333333333333333333330999990333003333333333333333333309999903330
        0033333333333333333330999990300000033333333333333333309999903330
        0033333333333333333330999990333003333333333333333333300000003333
        3333333333333333333333333333333333333333333333333333000000000000
        0000000000000000000000000000000000000000}
      NumGlyphs = 2
      OnClick = SyntaxBtnClick
    end
    object PrefixList: TComboBox
      Left = 368
      Top = 3
      Width = 145
      Height = 21
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 0
      OnChange = PrefixListChange
      OnEnter = PrefixListEnter
      OnExit = PrefixListExit
    end
  end
  object UserIn: TAnsi
    Left = 0
    Top = 27
    Width = 519
    Height = 227
    Cursor = crIBeam
    MaxSize = 0
    ScrollBars = ssBoth
    AutoFreeze = False
    ReadOnly = False
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Courier New'
    Font.Style = []
    TabOrder = 1
    Color = clBlack
    ParentColor = False
    ParentFont = False
    TabStop = True
    Align = alClient
    OnKeyDown = UserInKeyDown
  end
  object MainMenu1: TMainMenu
    Left = 392
    Top = 16
    object File1: TMenuItem
      Caption = '&File'
      ShortCut = 0
      object Open1: TMenuItem
        Caption = '&Open...'
        ShortCut = 0
        OnClick = Open1Click
      end
      object Save1: TMenuItem
        Caption = 'Sa&ve'
        ShortCut = 0
        OnClick = Save1Click
      end
      object SaveAs1: TMenuItem
        Caption = 'Save &As...'
        ShortCut = 0
        OnClick = SaveAs1Click
      end
      object Import1: TMenuItem
        Caption = '&Import...'
        ShortCut = 0
        OnClick = Import1Click
      end
      object N2: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Capture1: TMenuItem
        Caption = '&Capture'
        ShortCut = 0
        OnClick = Capture1Click
      end
      object SendandClose1: TMenuItem
        Caption = '&Send'
        ShortCut = 0
        OnClick = SendandClose1Click
      end
      object SendSelected1: TMenuItem
        Caption = 'Send Selected'
        ShortCut = 0
        OnClick = SendSelectBtnClick
      end
      object SendLine1: TMenuItem
        Caption = 'Send &Line'
        ShortCut = 0
        OnClick = SendLineBtnClick
      end
      object N5: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object PrinterSetup1: TMenuItem
        Caption = 'Printer Setup...'
        ShortCut = 0
        OnClick = PrinterSetup1Click
      end
      object Print1: TMenuItem
        Caption = '&Print'
        ShortCut = 0
        object Buffer1: TMenuItem
          Caption = '&Buffer'
          ShortCut = 0
          OnClick = Buffer1Click
        end
        object Selected1: TMenuItem
          Caption = '&Selected'
          ShortCut = 0
          OnClick = Selected1Click
        end
        object Screen1: TMenuItem
          Caption = 'Scree&n'
          ShortCut = 0
          OnClick = Screen1Click
        end
        object N8: TMenuItem
          Caption = '-'
          ShortCut = 0
        end
        object Color2: TMenuItem
          Caption = 'Color'
          ShortCut = 0
          OnClick = Color2Click
        end
      end
      object N3: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Exit1: TMenuItem
        Caption = 'C&lose'
        ShortCut = 0
        OnClick = Exit1Click
      end
    end
    object Edit1: TMenuItem
      Caption = '&Edit'
      ShortCut = 0
      object Cut1: TMenuItem
        Caption = 'Cu&t'
        ShortCut = 16472
        OnClick = Cut1Click
      end
      object Copy1: TMenuItem
        Caption = '&Copy'
        ShortCut = 16451
        OnClick = Copy1Click
      end
      object Paste1: TMenuItem
        Caption = '&Paste'
        ShortCut = 16470
        OnClick = Paste1Click
      end
      object N1: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object SelectAll1: TMenuItem
        Caption = 'Select &All'
        ShortCut = 16449
        OnClick = SelectAll1Click
      end
      object Clear1: TMenuItem
        Caption = 'C&lear Selection'
        ShortCut = 0
        OnClick = Clear1Click
      end
      object ClearAll1: TMenuItem
        Caption = 'Clear All'
        ShortCut = 16430
        OnClick = ClearAll1Click
      end
      object N4: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Find1: TMenuItem
        Caption = '&Find...'
        ShortCut = 0
        OnClick = Find1Click
      end
    end
    object Text1: TMenuItem
      Caption = '&Options'
      ShortCut = 0
      OnClick = Text1Click
      object Color1: TMenuItem
        Caption = '&Color...'
        ShortCut = 0
        OnClick = Color1Click
      end
      object Bold1: TMenuItem
        Caption = '&Bold'
        ShortCut = 0
        OnClick = Bold1Click
      end
      object N6: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Capture2: TMenuItem
        Caption = '&Capture'
        ShortCut = 0
        OnClick = ToggleClick
      end
      object Prefix1: TMenuItem
        Caption = 'Pre&fix'
        ShortCut = 0
        OnClick = PrefixBtnClick
      end
      object Parse1: TMenuItem
        Caption = '&Parse'
        ShortCut = 0
        OnClick = Parse1Click
      end
      object ColorSyntax1: TMenuItem
        Caption = 'Color Syntax'
        ShortCut = 0
      end
      object N7: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Options1: TMenuItem
        Caption = '&Strings...'
        ShortCut = 0
        OnClick = Options1Click
      end
    end
    object Window1: TMenuItem
      Caption = '&Window'
      ShortCut = 0
      object Refresh1: TMenuItem
        Caption = '&Refresh'
        ShortCut = 16467
        OnClick = Refresh1Click
      end
    end
  end
  object OpenFile: TOpenDialog
    DefaultExt = 'TXT'
    FileEditStyle = fsEdit
    Filter = 'Text Files|*.txt|All Files|*.*'
    Options = [ofFileMustExist]
    Left = 360
    Top = 16
  end
  object SaveFile: TSaveDialog
    DefaultExt = 'TXT'
    FileEditStyle = fsEdit
    Filter = 'Text Files|*.txt|All Files|*.*'
    Options = [ofOverwritePrompt, ofHideReadOnly]
    Left = 328
    Top = 16
  end
  object FindDlg: TFindDialog
    Options = [frDown, frHideMatchCase, frHideWholeWord]
    OnFind = FindDlgFind
    Left = 328
    Top = 48
  end
end